let help ="
    Chargez votre image au format bmp grace au bouton ouvrir. \n
    Entrez ensuite les altitudes que vous desirez avoir grace au bouton altitude.\n
    Maintenant traitez l`image. \n
    ! La triangulation de delaunay ne s`affiche qu`en 3D ! \n
    Vous pouvez maintenant passez a l`affichage 3D.\n
    Pour vous deplacer utilisez les touches suivantes :
        - 'w' et 's' pour monter et descendre la carte
        - 'a' et 'd' pour decaler la carte a droite ou a gauche
        - les fleches directionelles, 'u' et 'o' pour faire pivoter la carte
        - 'i' et 'k' pour zommer et de-zommer


    Enjoy!\n\n"

let authors ="
    Maps Are Pointless \n
    -Christophe Vermorel (vermor_c)
    -Baptiste Bouleau (boulea_b)
    -Said Essaki (essaki_s)
    -Alexandre Belingard (beling_a)

    Site web : maps-are-pointless.eu
    "

let main () =
    if (Array.length Sys.argv) > 1 then
        if (Sys.argv.(1) = "--help"
        || Sys.argv.(1) = "-help"
        || Sys.argv.(1) ="-h") then
            begin
                print_endline help;
                exit 0;
            end
        else
            if (Sys.argv.(1) = "--credits"
            || Sys.argv.(1) = "-credits"
            || Sys.argv.(1) = "--authors"
            || Sys.argv.(1) = "-authors"
            || Sys.argv.(1) = "-a") then
                begin
                    print_endline authors;
                    exit 0;
                end

